100 FORX=4864TO4935:READAH$:POKEX,(null)(AH$):NEXT
110 POKE254,50:SYS4864
120 PRINT"POKE 254,X---FOR SPEED"
130 PRINT"SYS 4864-----TO ACTIVATE"
140 DATA78,A9,21,8D,26,03,A9,13,8D,27
150 DATA03,A9,00,A0,17,99,00,D4,88,10
160 DATAFA,A9,0F,8D,18,D4,A9,01,8D,05
170 DATAD4,58,60,48,8A,48,98,48,A6,FE
180 DATAA0,00,88,D0,FD,CA,D0,FA,A9,0A
190 DATA8D,01,D4,A9,20,8D,04,D4,A9,21
200 DATA8D,04,D4,68,A8,68,AA,68,4C,79
210 DATAEF,4D
500 PRINT"HOW DO YOU LIKE THIS SPEED CONTROL WEDGE?"